read a
if [[ $a =~ $'\r' ]]; then
  echo 1;
fi
